CommonEvent 5431
Name = "Queen Harpy"

  999([5431])
  ConditionalBranch([0, 26, 1])
    FadeoutScreen([])
    ErasePicture([5])
    ErasePicture([6])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["・・・・・・・・"])
    FadeoutBGM([2])
    Wait([120])
    PlayBGM(["RPG::BGM(@name=\"castle6\", @volume=100, @pitch=100)"])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ShowPicture([5, "80_queenhapy_st02", 0, 0, 0, 0, 100, 100, 0, 0])
  MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Would you like to mate with me?"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>P-please..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Lucretia holds me tightly, and forces my waist into hers."])
  ShowText(["She brings her vagina closer to my penis."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["The Queen is the center of the tribe."])
  ShowText(["To have lots of children, I need to mate with many men."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Because of that, I have to mate quickly."])
  ShowText(["A Queen's pussy is so exquisite that a normal man can barely last ten seconds."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Shall I give you a taste?"])
  PlayBGM(["RPG::BGM(@name=\"ero1\", @volume=100, @pitch=100)"])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean01_innerworks_a1\", @volume=80, @pitch=100)"])
  ShowPicture([5, "ev_queenhapy_h1", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Lucretia tightly holds me, and pushes me into her."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ahhhh...!!"])
  ShowText([""])
  ShowPicture([6, "ev_queenhapy_ct01", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Her insides were slimy and warm, and slightly loose."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["But her walls were covered with rough spots, and the grainy texture sent chills down my spine with every movement."])
  ShowText([""])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Do the soft bumps inside of me feel good?"])
  ShowText(["Just being inserted into the Queen is an unbearable pleasure, isn't it?"])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Once you reach all the way inside, there's no way you can endure."])
  ShowText(["Let me show you, fufu."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahiii!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My penis gets enveloped from top to bottom by the Queen's vagina."])
  ShowText(["Wrapped inside of her, a strange pleasure spreads throughout my dick."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["What is this...?"])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["At the deepest place inside of me is a special part that fits the tip of the penis."])
  ShowText(["With it, I can specially massage the tip separate from the rest of the penis."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["With the Queen's special technique, I can force any man to come whenever I want."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahh!... Ahhh!"])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean04_innerworks_a4\", @volume=80, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["In her deepest part, I can feel her walls start to close around my tip."])
  ShowText(["It feels like my penis is being slowly encased by a hand, rubbing against it."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The intense pleasure makes my body start to writhe."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Fufu... I only did it for a second, but you avoided an instant death, huh?"])
  ShowText(["But no matter."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["My vagina forces an unbearable pleasure to a male, squeezing out his semen in no time."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahii! Amazing!"])
  ShowText(["Aahhhh!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Lucretia tightens around my tip again, deep inside of her."])
  ShowText(["Surrounded by her soft flesh, I go over the edge."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The pleasure was too much, I couldn't bear it any longer."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Haauuu!!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_queenhapy_h2", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowPicture([6, "ev_queenhapy_ct02", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Surrendering to the pleasure, I explode inside of her."])
  ShowText(["I came so fast..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Lucretia continues to squeeze me deep inside of her, even as I orgasm."])
  ShowText([""])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Fufu... Already giving up?"])
  ShowText(["You actually managed to last twenty seconds..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Shall I force you to come a few more times?"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahii! Ahhhh!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Even before I finish ejaculating, she's already trying to squeeze out the next."])
  ShowText(["It's like a strong grip tightening around my penis, while my glans is being crushed."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Without any restrictions, Lucretia continues to mercilessly stimulate me."])
  ShowText(["Stuck in her, I have no choice but to accept the pleasure."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Stop... Or I'll come again..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Come."])
  ShowText(["There's no point holding on... Here, I'll do this."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Hauuuu...!!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Lucretia suddenly contracts around me as my mind goes blank."])
  CallCommonEvent([104])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I just came a few seconds ago, but I'm already forced to another height."])
  ShowText([""])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Fufu... This is what it's like to mate with the Queen."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["I can force a man to ejaculate whenever I wish."])
  ShowText([""])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Like this, I can mate many times every day."])
  ShowText(["Let's go again. Can you last longer than a few seconds this time?"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Haaa! Stop it!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Ignoring my pleas, she tightens around my tip deep inside of her again."])
  ShowText(["Her unending assault leads me to a world of pleasure."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It was as if as soon as I entered into her, I was forced to obey every command this Queen gave."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["There's no way I can endure this..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Co...coming!"])
  CallCommonEvent([104])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Queen stares at me as I shoot more proof of my surrender into her."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Fufu... And that's how a Queen Harpy mates with men."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["As you can see, my vagina is a very unique instrument."])
  ShowText(["The ultimate pleasure forces men into surrender and shame."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["But soon you'll be a slave to my whims..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["and ejaculate whenever I wish."])
  ShowText(["Accept that position as your new joy."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Auu.. Such a thing..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Fear starts to run through me at her words, as I try to pull out of her."])
  ShowText(["But..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Once you're in the Queen, you can't get out."])
  ShowText(["If you try to pull out..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahh! Ahhhh!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["When I try to pull out of her, the friction caused by her deepest part holding onto my tip is too much to bear."])
  ShowText([""])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["A harpy has a different vagina than other monsters."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["The Queen's vagina functions in such a way as to bring a deeper pleasure to a man."])
  ShowText(["It has a thicker texture."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["The extreme pleasure will force a man to come if he tries to escape."])
  ShowText(["Once you're in the deepest part, if you try to pull it out the pleasure only increases."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ahi... Ha..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I can't pull out of her even a little bit."])
  ShowText(["Whenever I do, an even more powerful pleasure attacks me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Trying one last time, the pleasure is too much for me and sends me over the edge..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Aahhh!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_queenhapy_h3", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowPicture([6, "ev_queenhapy_ct03", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Do you understand now?"])
  ShowText(["There's no escape from me..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I explode yet again inside of Lucretia's vagina."])
  ShowText(["While ejaculating, she me back inside the deepest part of her vagina."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Unable to pull out, I writhe helplessly inside of her..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Let me wring out a few more from you."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["Don't worry though, I won't kill you."])
  ShowText(["For now, I'll squeeze you until you faint."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Hyaaaaaaaaa...!!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Lucretia squeezes me deep inside of her yet again."])
  ShowText(["Unable to resist her, I go over the edge again."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Aahhh..."])
  CallCommonEvent([104])
  CallCommonEvent([105])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["\\n<Lucretia>"])
  ShowText(["More... Ejaculate even more..."])
  ShowText(["Let me drain everything out of you..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Sto...p... Faa...."])
  CallCommonEvent([104])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My dick throbs, and I pour even more into Lucretia's pussy."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Unable to escape from the soft flesh firmly holding my penis, I'm brought to the peak over and over."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Dozens of times... I've lost count."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Aiiie..."])
  ShowText([""])
  CallCommonEvent([104])
  ShowPicture([5, "ev_queenhapy_h4", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowPicture([6, "ev_queenhapy_ct04", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["After coming over and over again, my consciousness drifts away from the storm of pleasures."])
  ShowText(["Thus, I lose consciousness."])
  FadeoutScreen([])
  ErasePicture([5])
  ErasePicture([6])
  FadeoutBGS([2])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["・・・・・・・・"])
  CallCommonEvent([4000])
  Empty([])
